home *** CD-ROM | disk | FTP | other *** search
/ .net 2002 March / DotNetMagazine-Issue107-Coverdisc-NET107-02-03-PCMac.bin / pc / PC Software / free_browsing / DavesQckSearchDbar3-14 / dqsd.exe / searches / lottogen.xml < prev    next >
Text File  |  2002-09-06  |  2KB  |  70 lines
  1. <search function="lottogen">
  2.   <name>Lottery Number Generation</name>
  3.   <description>
  4.     Generate the winning lottery numbers from DQSD's crystal ball..<br/>
  5.     <div class="helpboxDescLabels">Usage:</div>
  6.     <table class="helpboxDescTable">
  7.         <tr><td>lottogen [<<i>number of values to generate</i>>] <br/>(Defaults to 6)</td></tr>
  8.     </table>
  9.     <a class="helpboxDescLabels">Example:</a><br/>
  10.     <table class="helpBoxDescTable">
  11.         <tr><td class="helpboxDescColumns">lottogen</td></tr>
  12.         <tr><td class="helpboxDescColumns">lottogen 4</td></tr>
  13.     </table>
  14.   </description>
  15.   <category>Fun</category>
  16.   <contributor>Monty Scroggins</contributor>
  17.   <script><![CDATA[
  18.     function lottogen(c) {
  19.       var args = c.split(/\s+|,/);
  20.  
  21.       // new york lotto: 6 numbers from 1-59.
  22.       var numbercount = 6;
  23.       var maxnumbers = 59;
  24.  
  25.       if (args.length == 1 && args[0] != "")
  26.       {
  27.           maxnumbers = parseInt(args[0]);
  28.       }
  29.       else if (args.length == 2)
  30.       {
  31.           numbercount = parseInt(args[0]);
  32.           maxnumbers = parseInt(args[1]);
  33.       }
  34.  
  35.       if (numbercount > maxnumbers)
  36.       {
  37.           temp = numbercount;
  38.           numbercount = maxnumbers;
  39.           maxnumbers = temp;
  40.       }
  41.  
  42.       var ok = 1;
  43.       r = new Array (numbercount);
  44.       for (var i = 1; i <= numbercount; i++) {
  45.         r[i] = Math.round(Math.random() * (maxnumbers-1))+1;
  46.       }
  47.       for (var i = numbercount; i >= 1; i--) {
  48.         for (var j = numbercount; j >= 1; j--) {
  49.           if ((i != j) && (r[i] == r[j])) ok = 0; 
  50.         }   
  51.       }
  52.       if (ok) {
  53.         var output = "Lucky numbers:";
  54.         for (var k = 1; k <= numbercount; k++) {
  55.           output += " "+r[k];
  56.         }
  57.         document.deff.q.value = output;
  58.       }     
  59.       else lottogen(numbercount + " " + maxnumbers);
  60.         
  61.   }
  62.   ]]></script>
  63.  
  64.   <copyright>
  65.   Copyright (c) 2002 David Bau
  66.   Distributed under the terms of the
  67.   GNU Public License, Version 2 (http://www.gnu.org/copyleft/gpl.txt)
  68.   </copyright>
  69. </search>
  70.